inherited FRotinaEstMaximo: TFRotinaEstMaximo
  Left = 379
  Top = 359
  Caption = 'Calculo do Estoque M'#225'ximo'
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  inherited panel2: TPanel
    inherited BtnExec: TBitBtn
      OnClick = BtnExecClick
    end
  end
  inherited pnBg: TPanel
    object Label1: TLabel
      Left = 8
      Top = 120
      Width = 319
      Height = 16
      Caption = 'Quantidade de meses para calculo do consumo m'#233'dio:'
    end
    object Label2: TLabel
      Left = 8
      Top = 152
      Width = 308
      Height = 16
      Caption = 'Quantidade de dias para calculo do estoque m'#225'ximo:'
    end
    object Label3: TLabel
      Left = 9
      Top = 9
      Width = 102
      Height = 16
      Caption = 'Grupo do Produto'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 9
      Top = 57
      Width = 171
      Height = 16
      Caption = 'Classifica'#231#227'o do Produto (F8)'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object edMesesConMedio: TEdit
      Left = 330
      Top = 118
      Width = 29
      Height = 22
      TabOrder = 0
      OnExit = edMesesConMedioExit
      OnKeyPress = edMesesConMedioKeyPress
    end
    object edDias: TEdit
      Left = 330
      Top = 150
      Width = 29
      Height = 22
      TabOrder = 1
      OnExit = edDiasExit
      OnKeyPress = edMesesConMedioKeyPress
    end
    object DBLGrupoProduto: TDBLookupComboBox
      Left = 9
      Top = 26
      Width = 325
      Height = 22
      Ctl3D = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      KeyField = 'GRUP_PROD_CODIGO'
      ListField = 'GRUP_PROD_DESCRICAO'
      ListSource = DSGrupoProduto
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 2
      OnKeyDown = DBLGrupoProdutoKeyDown
    end
    object DBLCBNivel1: TDBLookupComboBox
      Left = 9
      Top = 74
      Width = 325
      Height = 22
      Ctl3D = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      KeyField = 'CLASS_PROD_CODIGO'
      ListField = 'CLASS_PROD_DESCRICAO'
      ListSource = DSNivel1
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 3
      OnKeyDown = DBLCBNivel1KeyDown
    end
  end
  object QPesquisa: TQuery
    DatabaseName = 'base'
    Left = 104
    Top = 160
  end
  object DSNivel1: TDataSource
    DataSet = DMGestao.QClassProduto
    Left = 256
    Top = 96
  end
  object DSGrupoProduto: TDataSource
    DataSet = DMGestao.QGrupProduto
    Left = 240
    Top = 184
  end
end
